home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
COMMUNIC
/
H191.ZIP
/
CA29-3.EXE
/
DOORWAY.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1991-07-16
|
2KB
|
49 lines
;----- Doorway invocation: Modify this to suit your installation ----
;
S29 = "c:\doorway\doorway com4 /S:* /G:ON /V:B^U /M:1000 /C:DOS /V:D /B:Z"
;
; ----- COM-AND Drop-to-DOS -----------------------------------------
;
; This script performs the following:
;
; i) A batch file is built (named DROPDOS.BAT)
; ii) Invocation of DROPDOS is stacked, with typethru disabled
; III) COM-AND is terminated without hanging up
;
; The batch file:
;
; i) Invokes a doorway function, as specified in above
; ii) When the doorway exits, COM-AND is restarted, without hangup
;
; This function allows DOS (or a program) to be made fully available
; (in text mode display) to a remote caller.
;
; Pgm: R.McGinnis; Chicago 1991
; --------------------------------------------------------------------
;
; Build a batch file
;
FOPENO "DROPDOS.BAT" TEXT
IF NOT SUCCESS
MESS "File error - cannot open batch file^M^J"
EXIT
ENDIF
WRITE "ECHO OFF!" ; Start the batch file
S0 = S29 ; Setup up drop to DOS command
PRESERVE S0 ; Make it printable
WRITE S0 ; Write the Drop to DOS command
WRITE "!" ; And a terminating cr
WRITE "CD "*"_SUBD"*"!" ; Change a changed directory
WRITE "COM-AND /q/p!" ; Inhibit COM-AND.CMD; take modem as set
WRITE "^Z"
FCLOSEO ; And we're done with it
CLOG "* Drop-to-DOS"
SET TTHRU OFF ; Disable type through
STACK CLEAR ; Place invocation of the batch file
STACK "DROPDOS.BAT!" ; .. into BIOS's area
BYE ; Do it.